home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 1 / LSD Compendium Deluxe 1.iso / a / programming / assembly / mapsrc.lha / macros / range < prev    next >
Encoding:
Text File  |  1980-02-19  |  171 b   |  14 lines
  1.  
  2. range:    macro    ;checks the range of a number: range dn,x1,x2
  3.         ;d0 = 0 if error
  4.  
  5.     cmp.w #\2,\1
  6.     bhs .\@
  7.     clr.w d0
  8.     bra .\@a
  9. .\@    cmp.w #\3,\1
  10.     bls .\@a
  11.     clr.w d0
  12. .\@a
  13.     endm
  14.